home *** CD-ROM | disk | FTP | other *** search
/ Carousel / CAROUSEL.cdr / mactosh / hc / firehydr.sit / Hydraulics Demo / card_14889.txt < prev    next >
Text File  |  1989-09-03  |  1KB  |  84 lines
  1. -- card: 14889 from stack: in
  2. -- bmap block id: 15219
  3. -- flags: 4000
  4. -- background id: 6979
  5. -- name: FLFormulasCd
  6. ----- HyperTalk script -----
  7. on openCard
  8.   show cd btn ID 1 of cd ID 7281
  9. end openCard
  10.  
  11.  
  12.  
  13.  
  14.  
  15.  
  16. -- part 1 (button)
  17. -- low flags: 00
  18. -- high flags: A003
  19. -- rect: left=232 top=301 right=327 bottom=278
  20. -- title width / last selected line: 0
  21. -- icon id / first selected line: 0 / 0
  22. -- text alignment: 1
  23. -- font id: 0
  24. -- text size: 12
  25. -- style flags: 0
  26. -- line height: 16
  27. -- part name: OK
  28. ----- HyperTalk script -----
  29. on mouseUp
  30.  
  31.   global Zip
  32.  
  33.   put "true" into Zip
  34.   visual effect dissolve
  35.   go to card id 13249
  36.  
  37. end mouseUp
  38.  
  39.  
  40.  
  41.  
  42.  
  43. -- part 3 (button)
  44. -- low flags: 80
  45. -- high flags: 8003
  46. -- rect: left=232 top=301 right=327 bottom=278
  47. -- title width / last selected line: 0
  48. -- icon id / first selected line: 0 / 0
  49. -- text alignment: 1
  50. -- font id: 0
  51. -- text size: 12
  52. -- style flags: 0
  53. -- line height: 16
  54. -- part name: OK
  55. ----- HyperTalk script -----
  56. on mouseUp
  57.   hide cd btn ID 3 of cd ID 7281
  58.   visual effect dissolve
  59.   go to cd ID 13249
  60. end mouseUp
  61.  
  62.  
  63.  
  64.  
  65. -- part 5 (field)
  66. -- low flags: 00
  67. -- high flags: 0000
  68. -- rect: left=20 top=215 right=293 bottom=483
  69. -- title width / last selected line: 0
  70. -- icon id / first selected line: 0 / 0
  71. -- text alignment: 0
  72. -- font id: 3
  73. -- text size: 12
  74. -- style flags: 256
  75. -- line height: 16
  76. -- part name: 
  77.  
  78.  
  79. -- part contents for card part 5
  80. ----- text -----
  81.  
  82. There is no loss or gain due to elevation changes.
  83.  
  84. * Rounded to the nearest whole number